extern int zunmqr_(char *side, char *trans, integer *m, integer *n, integer *k, doublecomplex *a, integer *lda, doublecomplex *tau, doublecomplex *c__, integer *ldc, doublecomplex *work, integer *lwork, integer *info, ftnlen side_len, ftnlen trans_len);
/*:ref: lsame_ 12 4 13 13 124 124 */
/*:ref: ilaenv_ 4 9 4 13 13 4 4 4 4 124 124 */
/*:ref: xerbla_ 14 3 13 4 124 */
/*:ref: zunm2r_ 14 14 13 13 4 4 4 9 4 9 9 4 9 4 124 124 */
/*:ref: zlarft_ 14 11 13 13 4 4 9 4 9 9 4 124 124 */
/*:ref: zlarfb_ 14 19 13 13 13 13 4 4 4 9 4 9 4 9 4 9 4 124 124 124 124 */
